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«TITLE SATSSFO4 = SATS SYSTEM SERVICE TESTS (FAILING S.C.) 
- IDENT Ydesb00" 
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7* ® 
:* COPYRIGHT (c) 1978, 1980, 1982, 1984 BY * 
:* DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. * 
;* ALL RIGHTS RESERVED. * 
b ~ 
t® THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED * 
3* IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE * 
* SION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER * 
:* § THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * 
3* PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * 
:* TRANSFERRED. ‘ 
3 © 
[* THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * 
:* AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * 
:® CORPORATION. * 
7* * 
* * 
2* * 
7* © 
7* ® 
7* a 


DIGITAL ASSUMES NO RESPONS BI 


IBILITY FOR THE USE OR RELIABILITY OF ITS 
SOFTWARE ON EQUIPMENT WHICH 


L 
S NOT SUPPLIED BY DIGITAL. 


REAR AAAAEAAE AEE AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEARAEAAAAAAAEAE 


+ 


+ 

FACILITY: SATS SYSTEM SERVICE TESTS 

ABSTRACT: THE SATSSFO4 MODULE TESTS THE EXECUTION 

VMS SYSTEM SERVICES, INVOKED IN SUCH A WAY AS TO EXPECT F 

STATUS CODES. THE SYSTEM SERVICES TESTED AND THE STATUS C 

EXPECTED ARE SUMMARIZED AS ARGUMENTS TO THE TESTSERV MACR 

CODES ARE TESTED IN OTHER MODULES. 

ENVIRONMENT: USER MODE IMAGE; NEEDS CMKRNL PRIVILEGE 
DYNAMICALLY ACQUIRES OTHER PRIVILEGES, AS NEEDED. 


AUTHOR: THOMAS L. CAFARELLA CREATION DATE: MMM, 1978 
PAUL D. FAY (DISPSERV & TESTSERV MACROS) 
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INCLUDE FILES: 


; GET RID OF MACRO DEFINITIONS 


E 
3 DEFINE UETP$_TEXT 


; UETP 


SAGES UETP,116,<<TEXT, INFO>> 
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MACROS: 


EQUATED SYMBOLS: 


BOW Nee oe LO ee 


_ 
fete tere cate cen) cece te cere 


<RO,R1,R2,R3,R4,R5,R 


cox 
o-wnm st < OoOeee 


wa 
oa 
oO 
. vw 
uw 
J oOo 
@ ” 
< = 
w J 
aoe ag 
<uct = = 
zo> a 
<= a 
Ow oOo w 
=38 Saf 
— 
wett wD 
ova az 
wn 
wa wor 
ec we Oe 
aus uZz@ 
we um 
“a o wo 
NMNE wn 
ee ww 
Ouvw mw | 
Az ed 
- & wun 
@ -= om 
vu > = 
Awe Sw 
ow geez 
or ad 
vos 
a eerere 
AWM 
— 
sx 
— 


weeeee THE FOLLOWING ASSIGNMENTS (IN PHD 
weeeee WITHOUT REFERENCE TO SPHDDEF 
weeeee SYMBOL TABLE OVERFLOW. FIX 

0 


R 
I 
N 
OWN STORAGE: 


sererece 0B OU) serere 


NPAT N OR CODD — CUPITIN OR. ODO CIM FN OR. DAO CUM TINOR. CORO 
WINIAIEIUNINIUNIN OOO 000000 OR-F-F-P-P_R-P-BR-BR-BR. 0000000000 0000 G0 00000. 


OOOOCOCSOOOOOOSOOSOOOOOSOOSOSOOSOSOOSSOOSOOCOSOSOOOOSCOO 
SOOSCSCOSOOSOSOSOSOOOSOSOOSOSOOSOSOSOOSOSOSOOSSOOSOSOSOOSOOOSOSOO 
DOOOOCOOOSOSOOSOSOOSOSOSOSOSSOSOSSOSOSSOSOSSSOOSOSOOSOSOOSOSoOO 
COOOOOOOSOSOOOOCOOSOSOSOSOOSOSOOSOSOSSOSOSOOSOOOOOSoOOO 


SOoooooor. OOoooeo 
SooooooooooooSo 
SoooQoooooocococca 
SOOoooooooooooSo 
CGoooooooocoooao 


B 13 
SATSSF04 = SATS SYSTEM SERVICE TESTS (FAILING $. 16-SEP-1984 00: AX/VMS Macro V04-00 Page 
SOus800 DECLARATIONS g- -SEP=1984 80: 36:03 Sere ey Rea SAY SSF OS MARS ° dy 
0000 0 : «PSECT RODATA,RD,NOWRT ,NOEXE ,LONG 
BFFC REG_COMP_MASK: .WORD | “Mc R2,R3,R4,R5,ROR7 R8,R9,R10,R11,AP,FP> ! *x8000 - 
0 i ; REG COMPARE MASK (HIGH=ORDER . 
95 Sos GAT NUST BE ON 
0 %6 ERR_MSG_FAOCTL: STRING 1,<!/!AC!17B!12B: REGISTER !2UW CONTENTS ALTERED>, - 
00 9 <: BEF one cSat Fb CALL: !8XL AFTER SERVICE CALL: !8XL> 
$f 38 TEST_MOD_NAME: STRING 4>  ; TEST MODULE NAME 
0 99 TEST“MOD-BEG: STRING + egun : DISPOSITION FIELD OF TEST MOD MSG 
07D 100 TEST-MOD-SUCC: STRING b* Sout cons fuld + DISPOSITION FIELD OF TEST MOD MSG 
O88 101 TEST“MOD"FAIL: STRING (C,<failed> : DISPOSITION FIELD OF TEST MOD MSG 
O8F 198 TEST-MOD-NAME_D: STRING 1 .<SATSSFO4> ; TEST MODULE NAME DESCRIPTOR 
O9F 103 TTNARE: STRING TERMINAL LOGICAL NAME 
00000000'00000000' 00A9 104 INADR: . LONG ress noaccess : PAGE ADDRESS OF NOACCESS PSECT 
09000000" 0081 105 PROT: “LONG ; PROTECTION CODE FOR NOACCESS PSECT 
FFFFFFFE FFFFFFFF 00BS 1 : ONES: “LONG 7 + A QUADWORD OF 1-BITS 
00000028 90BD 107 EFN_STM: CONG 43 : EFN ARGUMENT FOR SETIMR 
FFFFFFFF OOC1 108 EFN7STM10: “LONG “XFFFFFFFF : EFN ARGUMENT FOR SETIMR 
00000000 99000000 00CS5 109 DAYTIM_STM: -LONG 0,0 + DAYTIM ARGUMENT FOR SETIMR 
990000 0 OOCD 110 REQIDT“STM: “LONG 0 + REQIDT ARGUMENT FOR SETIMR 
0000009 00D1 111 TIMADR7GTT11 “BLKQ 1 + TIMADR ARGUMENT FOR GETTIM 
Q00000E7 00D9 112 TIMBUF_NMT11 “BLKW 7 ; TIMBUF ARGUMENT FOR NUMTIM 
00000000 00000000 O0E7 113 TIMADRINMT ;LONG 0,0 + TIMADR ARGUMENT FOR NUMTIM 
FFEOSCGA FFFFFFFF QOEF 114 TIMADRINMT23: .LONG <1, ~<60*24*100005/7 
OOF? 115 ; TIMADR ARGUMENT FOR NUMTIM 
OOF? 116 + (10,000 DAYS IN. 
OOF? 117 ; 100-NANOSECOND UNITS) 
00000000 00000000 O0F7 118 TIMADR_ATM . LONG : TIMADR ARGUMENT FOR ASCTIM 
FFEOSCGA FFFFFFFF OOFF 119 TIMADR ~ATM30: ~ LONG nd ~<60*24%10000>/7 
0107 139 : TIMADR att FOR ASCTIM 
0107-121 : (10,000 DAYS 
0107 1 : ae 1O0-NANOSECOND’ UNITS) 
00000001 0107 123 CVTFLG_ATM: .LONG 1 : CVTFLG ARGUMENT FOR ASCTIM 
0108 124 TIMBUF~BTM: STRING 1,<25-DEC-1973 21: 46:00. 
128 125 TIMBUF ARGUMENT FOR BINTIM 
128 1 2 TIMBUF_BTM10: STRING 1,<25-DEC-0001 51:46:00.00> 
0148 «1 - TIMBUF ARGUMENT FOR BINTIM 
0148 128 TIMBUF_BTM11: STRING 1,<25-DEC-1973 21: 61: 
0168 129 TIMBUF ARGUMENT FOR BINTIM 
0168 130 TIMBUF_BTM12: STRING 1,<29-FEB-1973 b9 14:21.33> 
0188 131 TIMBUF ARGUMENT FOR BINTIM 
gi 13 TIMBUF_BTM13: STRING 1,<0347 25:10:20.31> 
1a6—Oo ; TIMBUF ARGUMENT FOR BINTIM 
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SATSSF04 = SATS SYSTE AX/VM y Bas v04- P 
04-000 DECLARATIONS Seen 198s 82:35:23 FORINES Bache, VOte0O aps Pa8e 3, 
0000 164 -PSECT SATS_ACC 1,RD,WRT ,NOEXE ,PAGE 
00000290 168 EMPTY: -BLKB 4i9- : RESERVE A PAGE OF SPACE 
188 : cetenetataeeiinenesaleunabiinibiiinsibianitainimiimiadentnabiidiae 
15 ; * THE tet OF A hd IN THIS PSECT is CRITICAL. * 
1713 * DO NOT RE“ARRANGE THE VARIABLES. CONSULT SATS * 
83 17 a FUNCTIONAL SPECIFICATION FOR A DESCRIPTION OF THE USE * 
06 3 -¢ OF THE EMPTY PSECT (AND ITS COMPANION PSECT, NOACCESS). * 
‘ ® 
8 88 178 : REAR AAA TAAEREEAATAAAAAAATAREEEE 
CO «6177; 
QOO01FF § 00 178 BAYTIM_STM2 =.,-1 ; DAYTIM ARG FOR SETIMR (LAST BYTE IN PAGE) 
QOOO1FF 0200 17 TIMADR_GTT1 =.,2-1 ; TIMADR ARG FOR GETTIM (LAST BYTE IN PAGE) 
QOOOO1FF 0200 180 TIMBUF _NMT1 =.2-1 ; TIMBUF ARG FOR NUMTIM (LAST BYTE IN PAGE) 
000001FF 8 § 13) TIMADR_NMT2 = - 1 ; TIMADR ARG FOR NUMTIM (LAST SYTE IN PAGE) 
0500 188 ; 
0200 18 3 
0200 185; 
00000000 186 -PSECT SATS_ACCVIO_2,RD,WRT,NOEXE ,PAGE 
00000200 9900 187 NOACCESS: -BLKB 3127 RESERV RVE A PAGE OF SPACE 
00000000 00 188 - 512 ; RETURN LOC CTR TO BEGINNING OF PSECT 
00000000° 0000 189 " ADDRES S EMPTY ; ADDRESS OF ACCESSIBLE S$ 
00000000' ted 130 = “ADDRESS EMPTY/*X100 ; ADDRESS OF ACCESSIBLE NETRING 
0008 136 3 ; see NOTE -- DO NOT CHANGE LOCATION OR sore OF ABOVE Toetikrae 
0008 19S : ball THIS PSECT (NOACCESS) MUST APPEAR IN MEMORY IMMEDIATELY 
0008 194 : eee FOLLOWING THE EMPTY PSECT. PSECT NAMES AND OPTIONS WILL BE 
B08 192 3 3; tee CHOSEN TO FORCE THE DESIRED PSECT ORDERING. 
00000010 0008 197 bAYTIN. STM21: ~BLKQ 1 3; DAYTIM ARGUMENT FOR SETIMR 
00000018 Bois 138 | TIMADR “NAT 1% ~BLKQ 1 3; TIMADR ARGUMENT FOR NUMTIM 
001 00 
001 01 : 
001 8g 3 
00000000 20 -PSECT SATSSFO4,RD,WRT,EXE,LONG 
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“SEP=1984 04: UETPSY.SRCIJSATSSFO4.MAR; 1 (1) 


7 none 

$3 SATSSF04: 

0 “WORD *MCR2,R3,R4,R5,R6,R7,RB_RI R10, R11> 

71 ; ENTRY MASK 

fe SWAKE_S TPID ; i GET PID OF THIS PROCESS 

74 SSETPRA_S TEST_MOD_NAME_D 3 se PROCESS NAME 

75 BSBW “MOD MSG PRINT PRINT TEST nodULE BEGIN MSG 

id: MOVAL Test MOB_SUCC,TMD_ADDR : ASSUME END MSG WILL SHOW SUCCESS 
7 INSV  #SUCCESS;>#0,43,MOD_MSG_ cbt ADJUST STATUS CODE of Or SUCCESS 
78 MODE Pi R ; RNEL MODE TO ACCESS PHD 

79 MOVL a#CTLS$GL_PHD,RO T PROCESS HEADER ADDRESS 

80 MOVAL  PHD$O PRIVMSK(R9) ,PRIVMASK : GET MASK 

1 MODE FROM, TOS ; GET BACK TO USER MODE 

Be PRIV _— ADD, ALL ; GET ALL PRIVILEGES 

8 DISPSERV P DISPLAY INFO FOR TESTSERV 
84 SSETPRT_S INADR=INADR RETADR=RETABR 

85 PROT=PROT, PRVPRT=PRVPRT 

6 ; Set NOACCESS PSECT as 

? . FOR ACCESS 

8 BRW EXECUTE : GO" EXECUTE iE TEST CASES 

89 ROUP STM,1,TS1 

90 NERT_TEST_CASE SFSTM{0 
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. 
; TEST CASE NAME: SFSTM10 
: SYSTEM SERVICE: SETIMR 
: ARGUMENT UNDER TEST: EFN_STM10 
* INPUT CONDITIONS: 
ILLEGAL EVENT FLAG NUMBER 
* aaah ie hae bE 
* 1) SYSTEM STATUS CODE: ILLEFC 
: 2) REGISTERS R2 THROUGH FP UNCHANGED 
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NEXT_TEST_CASE SFSTM11 
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4 
SFSTM11 28 4 


INPUT CONDITIONS: 
ILLEGAL EVENT FLAG NUMBER 


EXPECTED RESULTS: 
1) SYSTEM STATUS CODE: ILLEFC 
2) REGISTERS R2 THROUGH FP UNCHANGED 
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74 

74  peeduebeneneconneseeesoeorsnoqnennenneusesenssesoneses 
o TEST CASE NAME: SFSTM11 

tt SYSTEM SERVICE: SETIMR 

oe ARGUMENT UNDER TEST: EFN_STM11 

? 

? 

? 
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OOOOOO91'"EF FF 8F 98 CVTBL 9 #-1,EFN_STM11 ; ILLEGAL EVENT FLAG NUMBER 


NEXT_TEST_CASE SFSTM12 
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LARRRAARALAALALELALAALALESES ESE SERRE SEES ESE EERE ER RES 

TEST CASE NAME: SFSTM12 

SYSTEM SERVICE: SETIMR 

ARGUMENT UNDER TEST: EFN_STM12 


INPUT CONDITIONS: 
ILLEGAL EVENT FLAG NUMBER 


EXPECTED RESULTS: 
1) SYSTEM STATUS CODE: ILLEFC 
2) REGISTERS R2 THROUGH FP UNCHANGED 
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MOVZBL #128,EFN_STM12 ; ILLEGAL EVENT FLAG NUMBER 
NEXT_TEST_CASE SFSTM13 
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PARR AASLAAALALALLALALAELALEL ESE REE EEE EE SEES SERS E EE a 
TEST CASE NAME: SFSTM13 
SYSTEM SERVICE: SETIMR 
ARGUMENT UNDER TEST: EFN_STM13 


INPUT CONDITIONS: 
ILLEGAL EVENT FLAG NUMBER 


EXPECTED RESULTS: 
1) SYSTEM STATUS CODE: ILLEFC 
2) REGISTERS R2 THROUGH FP UNCHANGED 
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NEXT_TEST_CASE SFSTM14 
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TEST CASE NAME: SFSTM14 

SYSTEM SERVICE: SETIMR 

ARGUMENT UNDER TEST: EFN_STM14 


INPUT CONDITIONS: 
PROCESS NEVER ASSOCIATED WITH SPECIFIED CLUSTER (3). 


EXPECTED RESULTS: 
1) SYSTEM STATUS CODE: UNASEFC 
2) REGISTERS R2 THROUGH FP UNCHANGED 
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NEXT_TEST_CASE SFSTM20 
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TEST CASE NAME: SFSTM20 
SYSTEM SERVICE: SETIMR 
ARGUMENT UNDER TEST: DAYTIM_5TM20 


INPUT CONDITIONS: 
EXPIRATION TIME AT LOCATION 0 


EXPECTED RESULTS: 
1) SYSTEM STATUS CODE: ACCVIO 
2) REGISTERS R2 THROUGH FP UNCHANGED 


LARA RASAAARAAAAALALALA SALAS SLE EASE SEE SET EERE TEESE EES SY 
- 


@eeneneneneneneaeennnnnse 


Soocoooos 
POPIPOPIPYIPINNININIPINPIPYPIPIPIMNINININYD 


SOMO OOOOOOAOOAOOOAOOOoOoO 
NNNNNNNNNNVNVWNNNINININININININININN 
Pe oP oP ot ot ot ot ot tt ot tt a 
UFWN 20 OCONOULWN—ODONAM 


RoPRoPORONONy 2 3 3 3 DOO 


NEXT_TEST_CASE SFSTM21 
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TEST CASE NAME: SFSTM21 
SYSTEM SERVICE: SETIMR 
ARGUMENT UNDER TEST: DAYTIM_STM21 


INPUT CONDITIONS: 
EXPIRATION TIME IN NON-ACCESSIBLE PSECT 


EXPECTED RESULTS: 
1) SYSTEM STATUS CODE: ACCVIO 
2) REGISTERS R2 THROUGH FP UNCHANGED 
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$Ou S808" SFStMS2 mit} 7 80: 36: ‘3 YOR bet Y.S Bae e ay eer be Manet th vo 
DF 447 ; 
DF 448 +4 
DF rf: b LARRAAASAALALAELELALALESLSAL LESSEE ELEC ESET EET EEE STs 
DF ; 
DF i ; * TEST CASE NAME: SFSTM22 
DF 433 ; * SYSTEM SERVICE: SETIMR 
DF 439 : * ARGUMENT UNDER TEST: DAYTIM_STM22 
DF re : * INPUT pfONDITIONS 
DF 438 : EXPIRATION TIME FIELD BEGINS IN ACCESSIBLE PSECT, ENDS 
DF 499 ;* IN NON-ACCESSISLE PSECT. 
DF 461: * EXPECTED RESULTS: 
DF 46¢ ; 1) SYSTEM STATUS CODE: ACCVIO 
DF 463: % 2) REGISTERS R2 THROUGH FP UNCHANGED 
DF 464 ; * 
DF 465: 
DF 466; 
DF 467; 
DF 468 


Soooococoeoo: 
Rorornonys: 


TCEND 
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suennednencenserenadbedsteresesqonraseqoenqeneensneees 
TEST CASE NAME: SFGTT10 
SYSTEM SERVICE: GETTIM 
ARGUMENT UNDER TEST: TIMADR_GTT10 


INPUT CONDITIONS: 
TIME OUTPUT FIELD AT LOCATION 1 


EXPECTED RESULTS: 
1) SYSTEM STATUS CODE: ACCVIO 
2) REGISTERS R2 THROUGH FP UNCHANGED 
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NEXT_TEST_CASE SFGTT11 
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1 492 ; 
1 238 p++ 
1 t8e fF RRAAREAAAAATAAT ETAT eT eee TAKA eee ee Keke eeeeeeeeeKeeeees 
1 495 ; * 
496 ; * TEST CASE NAME: SFGTT11 
13 498 ; * SYSTEM SERVICE: GETTIM 
: : * ARGUMENT UNDER TEST: TIMADR_GTT11 
1 : : * INPUT CONDITIONS: 
pi TIME OUTPUT FIELD IN READ/ONLY PSECT 
1 5 : * EXPECTED RESULTS: 
031 $ : 1) SYSTEM STATUS CODE: ACCVIO 
$31 be 3 . 2) REGISTERS R2 THROUGH FP UNCHANGED 
031 509 : RRAARAAAAA AAA AAA AAA AAA AAAARARATARHRARARKRRKEKAKRA eee 
bi 19 seo 
031 113; 
0313 512 NEXT_TEST_CASE SFGTT12 
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1F 13; 
1F | 514 34 
ee 
IF 3 : * TEST CASE NAME: SFGTT12 
IF 19 : * SYSTEM SERVICE: GETTIM 
IF 1: * ARGUMENT UNDER TEST: TIMADR_GTT12 
1F : + * INPUT CONDITIONS: 
1F Ais TIME OUTPUT FIELD BEGINS IN ACCESSIBLE PSECT, ENDS 
It Sit IN NON“ACCESSIBLE PSECT. 
1F : : ® EXPECTED RESULTS: 
1F : : 1) SYSTEM STATUS CODE: ACCVIO 
IF pis 2) REGISTERS R2 THROUGH FP UNCHANGED 
O31F 1: 
O31F § 3 
O31F § 
O31F 534 


uw 


TCEND 
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LARRRAAASALALALALALALLALALALALELESE SESE SELES ESET EEE ETS 
TEST CASE NAME: SFNMT10 
SYSTEM SERVICE: NUMT IM 
ARGUMENT UNDER TEST: TIMBUF _NMT10 


INPUT CONDITIONS: 
TIME BUFFER AT LOCATION 1 


EXPECTED RESULTS: 
1) SYSTEM STATUS CODE: ACCVIO 
2) REGISTERS R2 THROUGH FP UNCHANGED 
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NEXT_TEST_CASE SFNMT11 
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TEST CASE NAME: SFNMT11 

SYSTEM SERVICE: NUMTIM 

ARGUMENT UNDER TEST: TIMBUF _NMT11 


INPUT CONDITIONS: 
TIME BUFFER IN READ/ONLY PSECT 


EXPECTED RESULTS: 
1) SYSTEM STATUS CODE: ACCVIO 
2) REGISTERS R2 THROUGH FP UNCHANGED 
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F 79 ; 
F i+ 
F : : * TEST CASE NAME: SFNMT12 
F 5; * SYSTEM SERVICE: NUMTIM 
f “ : * ARGUMENT UNDER TEST: TIMBUF _NMT12 
F $ ; INPUT CONDITIONS: 
F 0 ; * Tl me BUFFER BEGINS IN ACCESSIBLE PSECT, ENDS IN 
F gi ON-ACCESSIBLE PSECT. 
F 38 : * EXPECTED PESULTS: 
F 594: ) SYSTEM <TATUS CODE: ACCVIO 
i 99 ; 8 2) REGISTERS R2 THROUGH FP UNCHANGED 
O35 39 ; PAAAARABAAAAALALAMALAAALALALAESLEAALE LEELA RES E SEER REE ASS SG 
Ose 899 5 
035F 600 ° NEXT_TEST_CASE SFNMT20 
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TEST CASE NAME: SFNMT20 
SYSTEM SERVICE: NUMTIM 
ARGUMENT UNDER TEST: TIMADR_NMT20 


INPUT CONDITIONS: 
TIME VALUE AT LOCATION 0 


EXPECTED RESULTS: 
1) SYSTEM STATUS CODE: ACCVIO 
2) REGISTERS R2 THROUGH FP UNCHANGED 
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NEXT_TEST_CASE SFNMT21 
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TEST CASE NAME: SFNMT21 

: SYSTEM SERVICE: NUMTIM 

rs ARGUMENT UNDER TEST: TIMADR_NMT21 

* INPUT CONDITIONS: 

. TIME VALUE IN NON-ACCESSIBLE PSECT 

* EXPECTED RESULTS: 

* 1) SYSTEM STATUS CODE: ACCVIO 

* 2) REGISTERS R2 THROUGH FP UNCHANGED 
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43; 
43 : PAE SAE DA SS CDS EDA POE ETTORE TE 
3 8 
‘} ; * TEST CASE NAME: SFNMT22 
e9 : * SYSTEM SERVICE: NUMTIM 
0 631 : * ARGUMENT UNDER TEST: TIMADR_NMT22 
03 £36 $ * INPUT CONDITIONS: 
03 654; * TIME VALUE BEGINS IN ACCESSIBLE PSECT, ENDS 
655: * IN NON-ACCESSIBLE PSECT. 
0383 656: * 
038 657 : * EXPECTED RESULTS: 
03 658 : * 1) SYSTEM STATUS CODE: ACCVIO 
0383 659: * 2) REGISTERS R2 THROUGH FP UNCHANGED 
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3 ® 
; * TEST CASE NAME: SFNMT23 
: * SYSTEM SERVICE: NUMTIM 
: * ARGUMENT UNDER TEST: TIMADR_NMT23 
; 8 INPUT CONDITIONS: 
8 DELTA TIME VALUE EXCEEDS 9999 DAYS 
: * EXPECTED RESULTS: 
i 1) SYSTEM STATUS CODE: IVTIME 
; 8 2) REGISTERS R2 THROUGH FP UNCHANGED 
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TC_GROUP ATM,1,TS4 
NEXT_TEST_CASE SFATM30 
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" seceneenecseennonensateounenesacsennmeeeoneseneenonete 
TEST CASE NAME: SFATM30 
SYSTEM SERVICE: ASCTIM 
ARGUMENT UNDER TEST: TIMADR_ATM30 


INPUT CONDITIONS: 
DELTA TIME VALUE EXCEEDS 9999 DAYS 


EXPECTED RESULTS: 
1) SYSTEM STATUS CODE: IVTIME 
2) REGISTERS R2 THROUGH FP UNCHANGED 
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TEST CASE NAME: SFBTM10 

: SYSTEM SERVICE: BINTIM 

: ARGUMENT UNDER TEST: TIMBUF _BTM10 


wot CONDITIONS: 


NVALID peers TIME ( Ht) SPECIFIED IS 
EARLIER N SYSTEM BASE). 
EXPECTED RESULTS: 
1) SYSTEM STA ATUS CODE: IVTIME 
2) REGISTE ERS R2 THROUGH FP UNCHANGED 
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TEST CASE NAME: SFBTM11 
SYSTEM SERVICE: BINTIM 
ARGUMENT UNDER TEST: TIMBUF _BTM11 


INPUT CONDITIONS: 
INVALID ABSOLUTE TIME (MINUTES FIELD 
OUT OF RANGE). 


EXPECTED i tae g 
1) SYSTEM STATUS CODE: IVTIME 
2) REGISTERS R2 THROUGH FP UNCHANGED 
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; TEST CASE NAME: SFBTM12 

SYSTEM SERVICE: BINTIM 

ARGUMENT UNDER TEST: TIMBUF _BTM12 


INPUT CONDITIONS: 
INVALID ABSOLUTE TIME (NON-EXISTENT DATE). 


EXPECTED RESULTS: 
1) SYSTEM STATUS CODE: IVTIME 
2) REGISTERS R2 THROUGH FP UNCHANGED 
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4 4; 
4 5 a pnocconeeneonocorerseesensnneonusqceesuoneonoqneqeoees 
3 a 

4 f : ; * TEST CASE NAME: SFBTM13 

4 f p : * SYSTEM SERVICE: BINTIM 

4 196 : * ARGUMENT UNDER TEST: TIMBUF_BTM13 

4 ay : * INPUT CONDITIONS: 

4 £98 ; INVALID DELTA TIME (HOURS FIELD 

: 739 3 : OUT OF RANGE). 

4 198 : * EXPECTED RESULTS: 

403 799: * 1) SYSTEM STATUS CODE: IVTIME 

40 800 ;¢ 2) REGISTERS R2 THROUGH FP UNCHANGED 

8 60 : PARABAAASAALAAAALALAAAALLAALALALALSLELE EEE SEES E EEE EEE ES ERTS 
4 == 

040 804 ; 
0403 805 : 

0403 806 TCEND 


~$EP=198¢ 04:29: 
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sag" 


> 
> 
> 
; CLEAN UP & RETURN TO TEST_SERV_EXEC 
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= SATS SYSTEM SERVICE TESTS (FAILING S$. 16-SEP-1984 00:32:49 VAX/VMS Macro V04 e 7 
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SEP=19 UETPSY.SRCJSATSSF D naa: 1 (2) 
A fo 
cA TESTSERV GETTIM, ERR, SATS, - 
CA | <1, TIMADR_GTT a 
CA fIMADR_GTTIO.ACCVIO, - ; SEGTTIO 
CA ; TIMADRGTT11.ACCVIO, = : SFGTTI 
CA TIMADRGTT12.ACCVIO, = ¢: SFGTTI2 
a : 
$50 40 TS_CLEANUP ; CLEAN UP & RETURN TO TEST_SERV_EXEC 
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7BD 841 TS3: 
BD 46 TESTSERV NUMTIM,ERR, SATS, - 
7BD 844 <1, TIMBUF _NMT ~ 
7BD 845 fIMBUF_NMT10,ACCVIO, = ; SFNMT10 
7BD 46 TIMBUF “NMT11,ACCVIO, = ; SFNMT11 
78D 84 TIMBUF-NMT12,ACCVIO, = ; SFNMT12 
7BD 48 >; ° 
7BD 84 . 
78D 850 <1, TIMADR_NMT ~ 
78D 851 TIMADR_NMT20,ACCVIO, = ; SFNMT20 
7BD 3 TIMADR-NMT21,ACCVIO, = ; SFNMTO1 
7BD TIMADR-NMT g-ACCVIO, - 3 SFNMT ; 
7BD 854 TIMADR-NMT23,IVTIME, = : SENMT 
07BD 855 i. - 
O7BD 856 
0939 857 TS_CLEANUP ; CLEAN UP & RETURN TO TEST_SERV_EXEC 
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SATSSF = SATS SYSTEM SERVICE TESTS (FAILING S. 16-SEP-1984 00:32:49 VAX/VMS Macro V04-00 
5003808" =SEP=1984 90:36:43 Be TP ey RET SAY SSF OS MAR: 1 
9 58 TS4: 
: 3 TESTSERV ASCTIM,ERR, SATS, - 
9 6 <1, TIMLEN_ATM, ~ 
833 Bes eo 2 
959 864 <1, TIMBUF_ATM, - 
385 Bee me ° 
933 e <1, TIMADR_ATM - 
95 fIMADR_ATM30,IVTIME, = ; SFATM30 
0989 8? : 
0959 = 871 <1,CVTFLG_ATM, - 
$99 898 és : 
0BC7 gr TS_CLEANUP ; CLEAN UP & RETURN TO TEST_SERV_EXEC 
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~ SATS SYSTEM SERVICE TESTS (FAILING S. 16-SEP=1 


~$ee=13be Saiasics FONTHES Bacse, 


TESTSERV BINTIM,ERR,SATS, 
<1, TIMBUF_BTM 
fIMBUF_BTM10,1VTIME, 
TIMBUF-BTM11,1VTIME, 
TIMBUE-BTM1¢, IVTIME, 
TIMBUF~B1M13,1VTIME, 


<1, TIMADR_BTM, 


TS_ CLEANUP 


>, 


; CLEAN UP & RETURN TO TEST_SERV_EXEC 
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v04-000 EXECUTE & CLEANUP o73Eb= 98c be 39; 3 LOETPSt Y.SRCJSATSSF04.MAR; 1 - (2) 
pen $2 «-SBTTL EXECUTE & CLEANUP 
D6A Q EXECUTE: 
D6A 91 TEST_SERV_EXEC ; EXECUTE ALL T. CASES IN ALL GROUPS 
D9C 3 CLEANUP: 
0138 30 OD9C 9 BSBW MOD _MSG_ PRINT PRINT TEST MODULE END MSG 
00000044"EF O01 1C 01 FO OD9F 94 INSV #1, ASTSSV_INHIB_MSG,#1 MoD MSG_CO 
QDA8 895 ; INHIBIT PRINTING 
ODAS 896 SEXIT_S MOD_MSG_CODE ; EX i TO OP. SYS WITH MSG CODE 
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reveren SERVICE TESTS (FAILING S. 1 “360-1386 0:36:68 pacyes Be Macro V04- 
NES 27:42 (CUETPSY. 


oo 
= -DBDODCOCCSCCCOCCOCOCOCOOO 7 ATA 


PHM MM MMMMmMMmmMmMmmMmMmmnmmnmoOCCVCVTCTSO 
ANE VN Or 


Oo 
CONAN E WN 9 ODNO NE WIN  O OONOU Er 


ad RP ee sd Hd 


COOOOCCCOCOCOOO 


SEan 


~SBTTL SUBROUTINES 


REG_SAVE: 
PARRAASAAALARAAALALALALASALASERELESEE EASELS ASE SASSER EERE E SAREE GSS 
* t 
* SAVES RO THRU SP IN REG_SAVE_AREA ‘ 
ae 
PARRAARAAASALAASLALALALEASELEEEEE REESE SERRA REESE ERE EER SEER ARE RS RCSD 
PUSHR #R : SAVE ALL REGS ON STACK 
MOVCS #6 ats “hes. SAVE.AREA SAVE REGS (BEFORE S.S.) 
POPR #RO_T ; CLEAN 
RSB 5 ete AN AD RETURN 


AHHAATHA ACTH TATA TATA TA KATA AAA KARA A TATA ee eH ee eee eee e ee eETe 
® . 
* RESTORES RO THRU SP FROM REG_SAVE_AREA * 
« + 
AHeeTAHA RAHA ATA K ATTA TAKA AeA A AAA AAA AH AAA eA A eee KA AAA Ke eee Te eeA Te 


SUBL ; 
MOVC 760,RE rae ss AREA, (SP) ; 

POPR #RO_THRO_S : RESTORE ALL Ae FOR TESTSERV 
RSB 3 «+. AND RETUR 


SRCJS Sat SSF 2. MAR; 1 


OVE SP TO MAKE ROOM FOR REGS 
MOVE REGS ONTO STACK FOR POP 


E 16 
SATSSF04 = SATS SYSTEM SERVICE TESTS (FAILING S. 16-SEP-1984 00:32:49 VAX/VMS Macro V04-00 Page 45 | 
v04=000 SUBROUTINES 8 ED -1984 88:3 242 UETPSY. SRETSATSSF OS «MAR: 1 02 
3 REG_COMP: | 
4 1 ! : LARRARAAAAEAAAALALALALAALE SELLERS ELA SE SASSER EEE ESSE EERE SEE ERE 
; * * 
E17 1014: * 1) PUSHES ALL REGS ONTO STACK " | 
E17 1015 ; * 2) COMPARES REGISTER IMAGES FROM STACK WITH CORRESPONDING * | 
EI? 16 .° IMAGES FROM REG_SAVE_AREA FOR ALL REGISTERS SPECIFIED * | 
; a : * 
E17 1 18 ; * 3) FOR EACH UNEQUAL COMPARE, AN ERROR MESSAGE IS PRINTED « | 
E17 1019; * USING $FAO AND SOUTPUT SYSTEM SERVICES). : | 
EI? 0; * 4) POPS ALL REGS OFF OF STACK ° | 
PY} ® 
a ! $ PARARBAAAAAALALAAALAAALAASERASERELERLE LARA LAE REAL RAS ERR RES R REAR ERAS 
E ; 
7FFF 8F BB OE17 1024 PUSHR #RO_THRU_SP ; SAVE _ALL REGISTERS ON STACK 
56 00000008'EF DE OE1B 1025 MOVAL REG-SAVE~AREA,R6 : POINT R6 TO BEG OF ... 
E22 1 $ ; se. REGS (BEFORE $.S.) 
54 SE 00 OF22 1 MOVL = SP,R4 : POINT R4 TO BEG OF 
E 1 8 3 ee. REGS (AFTER S.S.) 
53 FF 8F 98 O€25 1 CVTBL = #=1,R3 ; INITIALIZE REG_COMP_iMASK INDEX 
0E29 1030 REG_COMP NEXT: | 
53 D6 OE29 1031 TNCL ; POINT TO NEXT BIT IN MASK 
53 OF (91 OE B 10 : CMPB #15, R3 : END OF THE MASK ? 
03 1A OE2E 103 BGTRU REG_COMP_CONT : NO == CONTINUE 
009F 31 0E30 1034 BRW REG-COMP—RSB ; YES == GO TO COMMON RETURN 
OE 1035 REG_COMP_CONT: 
84 86 «OT E3 1 6 [MPL —- (R6) +, (R4)+ ; REG BEFORE = REG AFTER ? 
Fl 13 O€ 6 10 BEQLU REG COMP_NEXT : YES == LOOK FOR NEXT REG 
E9 OOOOOOOO'EF + 53 €1 oes 1038 BBC R3,REG_COMP_MASK,REG_COMP_NEXT 
£40 1039 :7NO -- GET NEXT IF BIT NOT SET 
00000048'EF 53 D0 QE 40 1040 MOVL R3,CLOB_REG_NO : NO == GIVE REG NUMBER TO FAO 
QOOODO4C'EF FC AG DO OE47 1041 MOVL  =-4(R6),REG_BEFORE SS  ; GIVE ‘BEFORE’ CONTENTS TO FA 
00000050 EF FC AG =6D0COOE4F 1048 MOVL  =4(R4),REG-AFTER SS : GIVE AFTER’ CONTENTS 
00000056"EF 2A 90 E57 1043 MOVE #*A/*/;,SS$TSTNSS+2 > GIVE FAILURE INDIC'N IN ERROR MSG 
OE5E 1048 SFAO_S ERR_MSG_FAOCTL,OUTL,OUTD,SSSNADS$, - 
OES 190? S$SASEQSS, S$PSEQSS,CLOB_REG_NO,REG_BEFORE_SS,REG_AFTER_SS 
F27C CF «F266 CF «=O COOE91 =: 1048 QUTL ourD ; ACTUAL_OUTPUT LEN IN STRING DESC'R 
E98 1049 PUTMSG <stETP$ TEXT,#1,#OUTD> |; PRINT THE M 
F260 CF 0084 8F 80 EAD 1050 MOV #OU,E-001 ) : GET MAX LEN BACK INTO DESCRIPTOR 
00 "EF 20 90 OEB4 1051 MOVB #*A/ /,SSTSTNSS+2 : REMOVE FAIL INDIC'N FOR NEXT MS 
00000060' EF 90000088" EF DE O€BB 105 MOVAL TEST_MOD FALL ®D ADDR; INDICATE FAILED IN END MSG 
00000044"EF 03 00 FO OEC6 1 3 INSV #ERROR,#0,#3,MOD_ASG_CODE ; ADJUST STATUS CODE FOR ERROR 
31 OECF 1 BRW REG_COMP_NEXT ; GO LOOK FOR NEXT REG TO COMPARE 
EDg 1055 REG_COMP_RSB: 
7FFF 8F BA OEDe 1 36 POPR #RO_THRU_SP ; CLEAN UP STACK 
05 OED6 105 RSB : RETURN TO CALLER | 
| 
| 
| 
| 


My 
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MOD _MSG_PRINT: 
. 
PPPS PSSST PTT P PTT E rrr irri rir iii iii iii iiiiiiiiiiy. 


* * 
* PRINTS THE TEST MODULE BEGUN/SUCCESSFUL/FAILED MESSAGES ® | 
® (USING THE PUTMSG MACRO). * 


SATSSF04 
v04=000 


e 
LARA ARARRAAAALAAAAAALALALEELELE SESE ETE SERRE EEE EEE EERE SECRETS SY 


PUTMSG <MOD_MSG_CODE,#2,TMN_ADDR,TMD_ADDR> ; PRINT MSG 
RSB t «ee AND RETURN TO CALLER 


SeGe Ge Ge Ge te tee 


HMRT 


N: 
PARAAARAALASALALALASELALE LES E SESE SEE SEES SESE S ESSE LASSE aS 


i 
| 
| 
e | 
* CHANGE MODE ROUTINE. THIS ROUTINE GETS CONTROL WHENEVER 
‘ A CMKRNL, CMEXEC, OR CMSUP SYSTEM SERVICE IS ISSUED 
« BY THE MODE MACRO ('TO' OPTION). IT MERELY DOES 
. A JUMP INDIRECT ON A FIELD SET UP BY MODE. IT HAS | 
‘ THE EFFECT OF RETURNING TO THE END OF THE MODE | 
* | 
: | 
| 
| 
| 


SIN NSIINIO POO OOOOOOUM 


CNAME WN 0 ODNOAOUE WN" OOONOULS W000 


MACRO EXPANSION. 


LARA RAAARAALALALAALSALALSALE LASERS SESE SEER SESE SERS RRR 


Be Se Se Se Se Se Ge Sete Sete Kee 


-WORD 0 ; ENTRY MASK 
JMP @CHM_CONT ; RETURN TO MODE MACRO IN NEW MODE 


; * RET INSTR WILL BE ISSUED IN EXPANSION OF ‘MODE FROM, ....' MACRO 
- END SATSSF04 


0000 
00000079"FF 17 
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wR 
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se ; 
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a 
=x 
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— 
ow 
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ww 
ow 
a 
ow NC MMMOONOOOOMTUMO ouon0on7 WOOOOOOOOOOOOOOOOOO OrucuCuCUCNCm 
— Sooo OOOO OOOOOOOOOoOO oooo Qooooooooooooooocoeoo COCO OOOOO 
v 
LT. 4 
=m 
° i >< >< OK OK << OK OK DK OK OK OK DK OK OK OK OK OK 
n> YVu9N9O VBVIVVUVINUNUVNYNU 
4 a @& @aoaancaeacaca¢aca«c&cac&cacac Saeacaanc aeacaacaacac 
~K— We € OU QOLCRMOOHNRODOQDOSKOet FF FUE KHER EE FE K-—COOOCOUYNROWu Oru om 
<w OF € URN —MONMNQOKULOOYWOOOME FFE FKOR KEKE E SE ETUMKIO DOOM DOO u ur 
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SATSSF04 
Symbol table 


TIMADR_GTT 
TIMADR=GTT 
MADR~GTT 
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TTRAME 
UETPS_SATSMS 
UETPS$~ TEXT 
WARNING 


PSECT name 


RWDATA 
SATS_A 
SATS_A 
SATSSF 
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Command processing 
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Performance indicators : 
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984 00:32:49 VAX/VMS Macro v04-00 
38 80:3 742 HORT hey. cae SAY SSF OS MAR: 1 


NOEXE NORD 
R EXE RD 
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I 16 
sATSHCS = SATS SYSTEM SERVICE TESTS (FAILING S. a oe 14 ~138¢ 0: 36:43 AX/VMS 
VAX-11 Macro Run Statistics =$ UETPSY.S 
gabe} table sort :00:00. :00:01.0 
Pas asf :00: £6 :00:10.1 
Symbol table output :00. :00:00.1 
Psect synopsis output 700. :00:00. 
Cross-reference output :00. g :00:00. 
Assembler run totals 96 tél. :00:52. 


The porting ses Limit was 1650 pages. 

80218 bytes_(157 pages) of virtual memory were used to pur ter he intermediate sger- 

There were 30 pages of symbol table ae due ing. Se to hold 347 non-local and 160 local symbols. 
1088 source Lines were read in Pass produc ing object records in Pass 2. 

64 pages of virtual memory were used to define & 8 macros. 
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! Macro Library statistics ! 
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Macro Library name Macros defined 
$255$DUA26: CSHRLIB) er. me: 1 19 
Mitta :LSYS.08 MLB; 1 9 

heySLlG STARLET. MLB;2 2 

Teast (all libraries) 42 


975 GETS were required to define 42 macros. 
There were no errors, warnings or information messages. 
MACRO/LIS=L1S$:SATSSF04/0BJ=0BJ$:SATSSFO4 MSRC$:SATSSF04/UPDATE=(ENHS: SATSSF04) +EXECML$/LIB+SHRLIB$:UETP/LIB 
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